(x-ctext): New coding system.

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index 6494d695fc307935d5b2c5666a00c820be0ce598..e66af645ed7c67170fa0dff59ea91666638558f3 100644 (file)
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -300,6 +300,15 @@
    nil ascii-eol ascii-cntl nil nil single-shift)
  '((safe-charsets . t)))
 
+(make-coding-system
+ 'x-ctext 2 ?x
+ "Compound text based generic encoding for decoding unknown messages."
+ '((ascii t) (latin-iso8859-1 t) t t
+   nil ascii-eol ascii-cntl nil locking-shift single-shift nil nil nil
+   init-bol nil nil)
+ '((safe-charsets . t)
+   (mime-charset . x-ctext)))
+
 (make-coding-system
  'iso-safe 2 ?-
  "Convert all characters but ASCII to `?'."